object frmGraficosRubricas: TfrmGraficosRubricas Left = 213 Top = 102 BorderStyle = bsNone Caption = 'frmGraficosRubricas' ClientHeight = 473 ClientWidth = 692 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Shape1: TShape Left = 0 Top = 0 Width = 692 Height = 473 Align = alClient end object Label1: TLabel Left = 10 Top = 296 Width = 105 Height = 13 Caption = 'Seleccione a Rubrica:' Transparent = True end object Label2: TLabel Left = 16 Top = 14 Width = 206 Height = 29 Caption = 'Gr�ficos Rubricas' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label4: TLabel Left = 616 Top = 12 Width = 55 Height = 20 Hint = 'Folha' Alignment = taRightJustify Caption = 'Label4' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Transparent = True end object Chart2: TChart Left = 170 Top = 64 Width = 500 Height = 361 AllowPanning = pmNone AllowZoom = False BackWall.Brush.Color = clWhite BackWall.Brush.Style = bsClear BackWall.Pen.Visible = False Title.Text.Strings = ( 'Totais por Rubrica') AxisVisible = False ClipPoints = False Frame.Visible = False Legend.Alignment = laBottom Legend.TextStyle = ltsPlain View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 View3DWalls = False BevelWidth = 0 Color = clWhite TabOrder = 4 object Series3: TPieSeries Marks.ArrowLength = 8 Marks.Style = smsValue Marks.Visible = True SeriesColor = clRed OtherSlice.Text = 'Other' PieValues.DateTime = False PieValues.Name = 'Pie' PieValues.Multiplier = 1.000000000000000000 PieValues.Order = loNone end end object Chart3: TChart Left = 170 Top = 64 Width = 500 Height = 361 AllowPanning = pmNone AllowZoom = False BackWall.Brush.Color = clWhite BackWall.Brush.Style = bsClear BackWall.Pen.Visible = False Title.Text.Strings = ( 'Receitas / Despesas') AxisVisible = False ClipPoints = False Frame.Visible = False Legend.Alignment = laBottom Legend.TextStyle = ltsPlain View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 View3DWalls = False BevelWidth = 0 Color = clWhite TabOrder = 5 object Series4: TPieSeries Marks.ArrowLength = 8 Marks.Style = smsPercent Marks.Visible = True SeriesColor = clRed OtherSlice.Text = 'Other' PieValues.DateTime = False PieValues.Name = 'Pie' PieValues.Multiplier = 1.000000000000000000 PieValues.Order = loNone end end object Chart1: TChart Left = 170 Top = 64 Width = 500 Height = 361 BackWall.Brush.Color = clWhite BackWall.Brush.Style = bsClear BackWall.Color = clWhite BottomWall.Color = clYellow Title.Font.Charset = DEFAULT_CHARSET Title.Font.Color = clBlue Title.Font.Height = -13 Title.Font.Name = 'Arial' Title.Font.Style = [] Title.Text.Strings = ( 'Mensais por Rubrica') BackColor = clWhite Legend.Alignment = laBottom BevelOuter = bvNone BevelWidth = 0 Color = clWhite TabOrder = 0 object Series1: TLineSeries Marks.ArrowLength = 8 Marks.Visible = False SeriesColor = clRed Title = 'Despesas' Pointer.InflateMargins = True Pointer.Style = psRectangle Pointer.Visible = False XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Y' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end object Series2: TLineSeries Marks.ArrowLength = 8 Marks.Visible = False SeriesColor = clGreen Title = 'Receitas' Pointer.InflateMargins = True Pointer.Style = psRectangle Pointer.Visible = False XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Y' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end end object BitBtn1: TBitBtn Left = 600 Top = 440 Width = 75 Height = 25 Caption = '&Sair' Default = True ModalResult = 1 TabOrder = 1 OnClick = BitBtn1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 end object ComboBox1: TComboBox Left = 64 Top = 316 Width = 105 Height = 21 Style = csDropDownList Ctl3D = False ItemHeight = 13 ParentCtl3D = False TabOrder = 2 OnChange = ComboBox1Change end object RadioGroup1: TRadioGroup Left = 12 Top = 56 Width = 157 Height = 233 Caption = ' Gr�ficos ' Color = clWhite ItemIndex = 0 Items.Strings = ( 'Mensais por Rubrica' 'Receitas por Rubrica' 'Despesas por Rubrica' 'Receitas / Despesas') ParentColor = False TabOrder = 3 OnClick = RadioGroup1Click end object BitBtn2: TBitBtn Left = 512 Top = 440 Width = 75 Height = 25 Caption = 'Imprimir' TabOrder = 6 OnClick = BitBtn2Click Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 1800000000000003000000000000000000000000000000000000FFFFFFFFFFFF FFFFFFFFFFFFFFFFFF000000404040000000FFFFFFFFFFFF000000FFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000040404050505040 4040000000303030C0C0C0303030FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF FFFFFF000000404040909090A0A0A0606060404040808080606060C0C0C03030 30FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000505050909090A0A0A0A0A0A080 8080606060404040808080B0B0B0909090303030FFFFFFFFFFFFFFFFFFFFFFFF 000000909090A0A0A0CFCFCFCFCFCF808080808080606060606060404040B0B0 B0303030FFFFFFFFFFFFFFFFFFFFFFFF606060A0A0A0CFCFCFCFCFCFC0C0C0CF CFCF808080808080606060606060202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 606060CFCFCFCFCFCFC0C0C0C0C0C0C0C0C0CFCFCF8080808080806060600000 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6FCFCFCFC0C0C0A06060C0C0C0C0 C0C0C0C0C0CFCFCF808080808080606060000000FFFFFFFFFFFFFFFFFFFFFFFF 3F3F3FCFCFCFA06060C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CFCFCF8080808080 80000000FFFFFFFFFFFFFFFFFF3030306F6F6F7F7F7FCFCFCFC0C0C0C0C0C0C0 C0C0C0C0C0C0C0C0C0C0C0CFCFCF808080000000FFFFFFFFFFFF0000006F6F6F FFFFFFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0AFAF AF000000FFFFFFFFFFFF3F3F3FFFFFFFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0 C0C0C0C0C0C0C0C0C0C0C0B0B0B0202020FFFFFFFFFFFFFFFFFF000000BFBFBF FFBFBFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0B0B0B0202020FFFF FFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFFFBFBFFFBFBFFFFFFF6F6F6F3F 3F3FCFCFCFB0B0B0202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 000000BFBFBFFFFFFF6F6F6F303030FFFFFF3F3F3F202020FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000003F3F3F000000FFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} end object tLivro: TTable DatabaseName = 'Database1' Filtered = True TableName = 'Livro.DB' Left = 576 Top = 48 end object tRubricas: TTable DatabaseName = 'Database1' TableName = 'Rubricas.DB' Left = 608 Top = 48 end object DataSource1: TDataSource DataSet = tRubricas Left = 640 Top = 48 end end